/*
 * Copyright (c) 1989 Regents of the University of California.
 * All rights reserved.  The Berkeley software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#ifndef lint
static char copyright[] = 
"Copyright (c) 1990 Regents of the University of California.\n\
All rights reserved.\n";
static char SccsId[] = "@(#)@(#)pop_parse.c	2.1  2.1 3/18/91";
#endif /* not lint */

#include "popper.h"
#include <stdio.h>
#include <sys/types.h>
#include <ctype.h>

pop_parse(p,buf)
     POP *p;
     char *buf;
{
  char *mp;
  register int i;
    
  /* Loop through the POP command array */
  for(mp=buf, i=0; ; i++) {
    
    /* Skip leading spaces and tabs in the message */
    while(isspace(*mp)) mp++;

    /*  Are we at the end of the message? */
    if (*mp == 0) break;

    /*  Have we already obtained the maximum allowable parameters? */
    if (i >= MAXPARMCOUNT) {
      pop_msg(p, POP_FAILURE, "Too many arguments supplied.");
      return -1;
    }

    /* Point to the start of the token */
    p->pop_parm[i] = mp;

    /* Search for the first space character (end of the token) */
    while (!isspace(*mp) && *mp) mp++;

    /* Delimit the token with a null */
    if (*mp) *mp++ = 0;
  }

  /* Were any parameters passed at all? */
  if (i == 0) return -1;

  /* Convert the first token (POP command) to lower case */
  pop_lower(p->pop_command);

  /* Return the number of tokens extracted minus the command itself */
  return i-1;
}
